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* 1. productive class: 

* definition 

class OPERATIONS definition, 
public section, 
class -methods: 

ADD importing A type I 
B type I 

returning VALUE (RESULT) type I. , 
endclass. 1 

* implementation 

class OPERATIONS implementation. 

method ADD. 

RBSULT • A + B . 

endue thod. 
endclass. 



* 2. test class:' 

* definition 

class TBST_OPBRATIOHS definition for testing. 

public section, 3 

methods TBST_ADD (for testing"! 
endclass . \ 

* implementation 

class TBST_opkratiohs implementation, 
method TBST ADD. 

* Sti-.^s^'ssi? s£ e ?. to etore the reauit crom ..thod, 

* call the method under test 
ACTOAL_RRSULT - OPERATIONS 




compare the result- with 
CL_ADNIT_ASSZR9£>ASSSRT 

ACT ■ ACTUAL JRJSULT 

EXP - 8 



MSG - 'this is the mess age which occurs if the test failed' 



endmethod. 
endclass . 
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ASSERT_EQUALS ( ACT = ACTUAL RESULT 



Where QUIT_VALUE definesat which level the test flow 
should be interrupted: 

- NO: continue the current test method. 

- METHOD: interrupt the current test method. 

- CLASS: interrupt the test class execution. 

- PROGRAM: abandon all test class executions of the 
currently tested program frame. 



EXP = EXPECTED_RESULT 
MSG = 'this test has failed' 
QUIT = QUIT_VALUE ). 




FIG, 4 
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